﻿Public Class tipo_periciaVO

    Private _id_tipo As Integer
    Private _desc_tipo As String
    Private _status As Boolean
    Private _prazo As Integer

    '-------------------------------------
    ' MÉTODO CONSTRUTOR SEM PARAMETROS
    '-------------------------------------

    Sub New()
        _id_tipo = Nothing
        _desc_tipo = Nothing
        _status = Nothing
        _prazo = Nothing
    End Sub

    '-------------------------------------
    ' MÉTODO CONSTRUTOR COM PARAMETROS
    '-------------------------------------

    Sub New(ByVal id_tipo As Integer, _
            ByVal desc_tipo As String, _
            ByVal status As Boolean, _
            ByVal prazo As Integer)

        _id_tipo = id_tipo
        _desc_tipo = desc_tipo
        _status = status
        _prazo = prazo
    End Sub

    Public Property ID_TIPO() As Integer
        Get

            Return _id_tipo

        End Get
        Set(ByVal value As Integer)

            _id_tipo = value

        End Set
    End Property

    Public Property DESC_TIPO() As String
        Get

            Return _desc_tipo

        End Get
        Set(ByVal value As String)

            _desc_tipo = value

        End Set
    End Property

    Public Property STATUS() As Boolean
        Get

            Return _status

        End Get
        Set(ByVal value As Boolean)

            _status = value

        End Set
    End Property


    Public Property PRAZO() As Integer
        Get

            Return _prazo

        End Get
        Set(ByVal value As Integer)

            _prazo = value

        End Set
    End Property

End Class
